home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 15 / BBS in a box XV-1.iso / Files / Tele / C / CommsService 2.0.2.sit / commsService 2.0.2 Final / Service Definition Files / James Cook University < prev    next >
Encoding:
Text File  |  1994-09-08  |  1.3 KB  |  30 lines  |  [TEXT/cSSv]

  1. #
  2. # commsService 2.0 Service Definition File.
  3. #
  4. Name=James Cook University
  5. Description=Provides access to JAMES COOK UNIVERSITY, TOWNSVILLE
  6.  
  7. TimeOut=0
  8. BreakEnabled=No
  9. PagesToScroll=10
  10. ConnectionTool=TGE TCP Tool
  11. ConnectionTokens=HostName JCULIB.JCU.EDU.AU PortNumber 23 ConnectionType TELNET TelnetBinaryMode FALSE TerminalType VT100
  12. ConnectionMenu=Yes
  13. TerminalTool=VT102 Tool
  14. TerminalTokens=FontSize 9 Width 80 Cursor Underline Online True LocalEcho False AutoRepeat True RepeatControls False AutoWrap False NewLine False Scroll Jump ShowControls False SwapBackspaceDelete False TerminalMode ANSI/VT102 ShowStatusBar False ShowTabRuler False InverseVideo False InsertChar False OriginAtMargin False KeyClick False CursorKey ANSI Keypad Numeric AnswerBack "" KeyboardLocked False ActiveCharSet G0 NRCSet USASCII G0 USASCII G1 USASCII G2 USASCII G3 USASCII
  15. TerminalMenu=No
  16. ServiceScripts=on LoginToService
  17. Global ActiveService, FoundString
  18. if ExpectFromService(ActiveService, 20, true, false, "login:") then
  19. if FoundString > 0 then
  20. if SendToService(ActiveService, "opac" & return, "") then
  21. if ExpectFromService(ActiveService, 20, true, true, "W E L C O M E     T O    T R O P I C A T") then
  22. if FoundString = 1  then return true
  23. end if
  24. end if
  25. end if
  26. end if
  27. return false
  28. end LoginToService
  29.  
  30.